home *** CD-ROM | disk | FTP | other *** search
/ PC Home 48 / Fun Clicp Art 5000.iso / r / mbm / 00784_SU-OU 1 ge.ls < prev    next >
Encoding:
Text File  |  1996-05-11  |  450 b   |  15 lines
  1. on enterFrame
  2.   global g1erSprNav, g1erSprLoc, g1erSprChr, gMaxBoutons, gLabel
  3.   if (gLabel = "SU:IN SU") or (gLabel = "SU:IN HI") or (gLabel = "SU:IN CO") or (gLabel = "SU:IN EN") then
  4.     nothing()
  5.   else
  6.     repeat with i = g1erSprChr to gMaxBoutons
  7.       puppetSprite(i, 0)
  8.     end repeat
  9.     set the visible of sprite 2 to 1
  10.     repeat with i = g1erSprNav + 1 to g1erSprLoc + 5
  11.       set the visible of sprite i to 1
  12.     end repeat
  13.   end if
  14. end
  15.